1) P2.SAI[KA,JLG] and 2) PASS2.SAI[KA,JLG]	4-18-86 20:38	pages 4,4

**** File 1) P2.SAI[KA,JLG]/4P/3L
1)	THAFE INTEGER ARRAY CW[-1:ONE] ;
1)	REQUIRE "DATUM" SOURCE!FILE ;
**** File 2) PASS2.SAI[KA,JLG]/4P/3L
2)	THAFE INTEGER ARRAY CW[0:ONE] ;
2)	REQUIRE "DATUM" SOURCE!FILE ;
***************


**** File 1) P2.SAI[KA,JLG]/4P/130L
1)	          BRC ← FNTFIL[J] ← CREATE(-1,255) ; MAKEBE(BRC, CW) ;
1)	          READFONT(J, FNTNAME[J], NULL);
**** File 2) PASS2.SAI[KA,JLG]/4P/130L
2)	          BRC ← FNTFIL[J] ← CREATE(0,127) ; MAKEBE(BRC, CW) ;
2)	          READFONT(J, FNTNAME[J], NULL);
***************


**** File 1) P2.SAI[KA,JLG]/5P/43L
1)		INTEGER SRC,len,spcnt, I, J, XPOS;
1)	        STRING TEMP;
1)	              
**** File 2) PASS2.SAI[KA,JLG]/5P/43L
2)		INTEGER SRC,len,spcnt ;
2)	              
***************